﻿Imports Mysoft.Map.Data

Partial Public Class LastNotice
    Inherits Mysoft.Map.Application.Security.AppPage

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load  
        If Not IsPostBack Then
            Dim dtNoTiceTable As DataTable = MyDB.GetDataTable("SELECT TOP 13 RowGUID,Subject,ModifiedOn FROM  myNotice ORDER BY  ModifiedOn DESC")
            rptNotice.BindMode = 1                                          '绑定模式：0 -- SQL 语句绑定，1 -- DataTable 绑定
            rptNotice.DataTable = dtNoTiceTable
            rptNotice.DataBind() 
        End If
    End Sub

End Class